@create Channel System=10
@VA Channel System=$+ch *:@switch [get(me/%N_%0)]=%0,{@pemit %#=You're already on that channel!},{@switch [hasflag(*%N, wizard)]=1,{&%0 me=[v(%0)]%b[num(%#)];@dolist [v(%0)]=@pemit ##=\[%0\] %n has joined this channel.;&%N_%0 me=%0},{@switch [get(me/allowed_%0)]=Everyone,{&%N_%0 me=%0;&%0 me=[v(%0)]%b[num(%#)];@dolist [v(%0)]=@pemit ##=\[%0\] %N has joined this channel.},{@switch [member(v(allowed_%0), %N)]=0,{@pemit %#=You cannot join that channel. It is locked.},{&%N_%0 me=%0;&%0 me=[v(%0)]%b[num(%#)];@dolist [v(%0)]=@pemit ##=\[%0\] %N has joined this channel.}}}}
@VB Channel System=$-ch *:@switch [get(me/%N_%0)]=%0,{&%N_%0 me=;@dolist [v(%0)]=@pemit ##=\[%0\] %N has left this channel.;@edit me/%0=%#,},{@pemit %#=You're not on that channel!}
@VC Channel System=$ch *=?*:@switch [get(me/%N_%0)]=%0,{@switch %1={;},{@dolist [v(%0)]=@pemit ##=\[%0\] %N%2},{:},{@dolist [v(%0)]=@pemit ##=\[%0\] %N %2},{@dolist [v(%0)]=@pemit ##=\[%0\] %N says "%1%2"}},{@pemit %#=You're not on that channel!}
@VD Channel System=$+ch/who *:@switch [get(me/%N_%0)]=%0,{@pemit %#=Members of channel %0:[iter([get(me/%0)],[switch(hasflag(##,connect),1,[name(##)],0,)])]},{@pemit %#=You're not on that channel!}
@Desc Channel System=`+help channel' will get you started.
@VX Channel System=$+ch/lock *=*:@switch [get(me/%N_%0)]=%0,{@switch [get(me/%0_creator)]=%N,{&allowed_%0 me=%1;@pemit %#=Channel `%0' locked to `%1'.},{@pemit %#=You are not the creator of channel: `%0'}},{@pemit %#=You're not on that channel!}
@VZ Channel System=$+ch/unlock *:@switch [get(me/%N_%0)]=%0,{&allowed_%0 me=Everyone;@pemit %#=Channel `%0' unlocked.},{@pemit %#=You're not on that channel!}
@VY Channel System=$mkchan *:@swi words(v(%0))=1,{@Pemit %#=Channel `%0' is already made.},{&allowed_%0 me=Everyone;@pemit %#=New channel made. `%0';&%0_creator me=%N}
&COPYRIGHT Channel System=[repeat(-,78)]%rChannel System%rVersion 2.0[space(55)]Onyx@Uk2%r[repeat(-,78)]
&HELP_1 Channel System=$+help channel:@pemit %#=[u(me/COPYRIGHT)]%rCommands:%rmkchan <channel name> - creates a channel with <channel name>%r+ch <channel> - used to connect to existing channels%r-ch <channel> - used to disconnect from existing channels%rch <channel>=<message> - broadcasts <message> over <channel>%r(Notice: On, ch <channel>=<message>, no + before, ch)%r+ch/who <channel> - displays who is connected to <channel>%r+ch/lock <channel>=<list of users> - locks <channel> to <list of users>%r+ch/unlock <channel> - unlocks <channel>, so everyone can get on%r%r\[ +help channel2 \] for more channel help%r[repeat(-,78)]
&HELP_2 Channel System=$+help channel2:@pemit %#=[U(me/COPYRIGHT)]%rMore help on channel:%r+help channel <topic> - for individual help on <topic>%rHere are a list of available topics:%rmaking%rjoining%rleaving%rtalking%rsecurity%r[repeat(-,78)]
&HELP_3 Channel System=$+help channel making:@pemit %#=[U(me/COPYRIGHT)]%rCommand: mkchan <channel name>%r[repeat(=,78)]%rMakes a channel with <channel name>%r%rExample:%r> mkchan code%r> New channel name. `code'%r[repeat(-,78)]
&HELP_4 Channel System=$+help channel joining:@pemit %#=[u(me/COPYRIGHT)]%rCommand: +ch <channel>%r[repeat(=,78)]%rConnects you to <channel>, if you are able to.%rIf you get, You cannot join that channel. It is locked., message try:%rmkchan <channel> the channel it says is locked may not have been created yet.%r%rExample:%r> +ch code%r> \[code\] Onyx has joined this channel.%r[repeat(-,78)]
&HELP_5 Channel System=$+help channel leaving:@pemit %#=[u(ME/COPYRIGHT)]%rCommand: -ch <channel>%r[repeat(=,78)]%rDisconnects you from <channel>%r%rExample:%r> -ch code%r> \[code\] Onyx has left this channel.%r[repeat(-,78)]
&HELP_6 Channel System=$+help channel talking:@pemit %#=[U(me/COPYRIGHT)]%rCommand: ch <channel>=<message>%r[repeat(=,78)]%rBroadcasts <message> over <channel>%r%rExample:%r> ch code=Hello%r> \[code\] Onyx says "Hello"%r[repeat(-,78)]
&HELP_7 Channel System=$+help channel security:@pemit %#=[U(me/COPYRIGHT)]%rCommands: +ch/lock <channel>=<list of users> and +ch/unlock <channel>%r[repeat(=,78)]%r1st command, locks <channel> to <list of users>%r2nd command, unlocks <channel> to everyone%r%rExample 1:%r> +ch/lock code=Paul Onyx%r> Channel `code' locked to `Paul Onyx'%r%rExample 2:%r> +ch/unlock code%r> Channel `code' unlocked.%r[repeat(-,78)]
